%version fecha=01/10/2014 16:11:10 hs
%0 convertir para poder operar con matlab V6
	%convertirOctaveToMatlab;
%-------------------------
%pto 1
	% 1.a obtener imagenes filtradas
	% 1.b calcular los errores relativos
	% 1.c mostrar imagenes orginal y degradada
	%cargar los filtros A1 y A2
	mapa_fil1 = load('.\datos_catedra_matlab\Filtro_A1.mat');
	mat_filtro1=mapa_fil1.A1;

	mapa_fil2 = load('.\datos_catedra_matlab\Filtro_A2.mat');
	mat_filtro2=mapa_fil2.A2;

	%cargar las imagenes originales X
	mapa_sat_X=load('.\datos_catedra_matlab\saturn64x64.mat');
	mat_sat_X = mapa_sat_X.X;
	mapa_pat_X=load('.\datos_catedra_matlab\Patente_A_64x64.mat');
	mat_pat_X = mapa_pat_X.X;

	%aplicar filtro 1
	punto_1(mat_filtro1,mat_sat_X, '.\out_images\orig_saturn64x64.jpg','.\out_images\degra_saturn64x64_f1.jpg','saturn64x64_f1.mat');
	punto_1(mat_filtro1,mat_pat_X, '.\out_images\orig_Patente_A_64x64.jpg','.\out_images\degra_Patente_A_64x64_f1.jpg','Patente_A_64x64_f1.mat');
	
	%aplicar filtro 2
	punto_1(mat_filtro2,mat_sat_X, '.\out_images\orig_saturn64x64.jpg','.\out_images\degra_saturn64x64_f2.jpg','saturn64x64_f2.mat');
	punto_1(mat_filtro2,mat_pat_X, '.\out_images\orig_Patente_A_64x64.jpg','.\out_images\degra_Patente_A_64x64_f2.jpg','Patente_A_64x64_f2.mat');

%-------------------------
%pto 3
%distorsionar X obtener X_distor
	clear;
	mapa_fil1 = load('.\datos_catedra_matlab\Filtro_A1.mat');
	mat_filtro1=mapa_fil1.A1;
	mapa_fil2 = load('.\datos_catedra_matlab\Filtro_A2.mat');
	mat_filtro2=mapa_fil2.A2;	
	%cargar las imagenes originales X
	mapa_sat_X=load('.\datos_catedra_matlab\saturn64x64.mat');
	mat_sat_X = mapa_sat_X.X;
	punto_3(mat_filtro1,mat_filtro2,mat_sat_X,'saturn64x64');
	mapa_pat_X=load('.\datos_catedra_matlab\Patente_A_64x64.mat');
	mat_pat_X = mapa_pat_X.X;
	punto_3(mat_filtro1,mat_filtro2,mat_pat_X,'Patente_A_64x64');
%-------------------------
%pto 4
%distorsionar X obtener X_distor
	clear;
	mapa_fil1 = load('.\datos_catedra_matlab\Filtro_A1.mat');
	mat_filtro1=mapa_fil1.A1;
	mapa_fil2 = load('.\datos_catedra_matlab\Filtro_A2.mat');
	mat_filtro2=mapa_fil2.A2;
	%cargar las imagenes originales X
	mapa_sat_X=load('.\datos_catedra_matlab\saturn64x64.mat');
	mat_sat_X = mapa_sat_X.X;
	punto_4(mat_filtro1,mat_filtro2,mat_sat_X,'saturn64x64');
	mapa_pat_X=load('.\datos_catedra_matlab\Patente_A_64x64.mat');
	mat_pat_X = mapa_pat_X.X;
	punto_4(mat_filtro1,mat_filtro2,mat_pat_X,'Patente_A_64x64');
%-------------------------
%pto 5
	clear;
	mapa_fil1 = load('.\datos_catedra_matlab\Filtro_A1.mat');
	mat_filtro1=mapa_fil1.A1;
	mapa_fil2 = load('.\datos_catedra_matlab\Filtro_A2.mat');
	mat_filtro2=mapa_fil2.A2;
	mapa_deg_Y1=load('.\datos_catedra_matlab\Degradada_1.mat');
	mat_degra_Y1=mapa_deg_Y1.Y1;
	mapa_deg_Y2=load('.\datos_catedra_matlab\Degradada_2.mat');
	mat_degra_Y2=mapa_deg_Y2.Y2;
	punto_5(mat_filtro1,mat_filtro2,mat_degra_Y1,mat_degra_Y2,'.\out_images\pto5_Patente_orig.jpg','pto5_Patente_orig.mat');
	
return;

